perm filename P61[C5,LCS] blob
sn#454155 filedate 1979-06-26 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00003 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 . DEVICE XGP
C00005 00003 .PAGE←60
C00006 ENDMK
C⊗;
. DEVICE XGP
.spacing 20*5 mills;
.EVERY HEADING(,{PAGE},)
.AREA TEXT LINES 4 TO 40
.FONT 1 "MBIG[HHA,LCS]"
.font 2 "BMETI[HHA,LCS]"
.font 4 "BMUS[HHA,LCS]"
.FONT 5 "MBIG[HHA,LCS]"
.FONT 6 "MBIG[HHA,LCS]"
.PORTION MAIN;
.PLACE TEXT;
.PAGE FRAME 140 WIDE 106 HIGH;
.COMPACT
.<< Put in a footnote. >>
.
.COUNT FOOTNOTE INLINE FROM 1 TO 999 IN PAGE PRINTING ⊂"*****"[1 TO FOOTNOTE]⊃
.<< (IF THISDEVICE = "XGP" THEN "%51%*" ELSE "[1]");>>
.
.FOOTSEP ← "__________";
.AT "$$" ENTRY "$"
. ⊂
. NEXT FOOTNOTE;
. FOOTNOTE!;
. SEND FOOT
. ⊂
. BEGIN "NEXT FOOTNOTE"
. SELECT 1;
. SINGLE SPACE
. SPACING 0 MILLS
. INDENT 0,0,0;
. (FOOTNOTE! & " ");
ENTRY
. END "NEXT FOOTNOTE";
. ⊃;
. ⊃;
.
.TURN ON "%↓_↑↓[&]","α"
.PAGE←60
.NEXT PAGE
.begin verbatim
Figure 62
.end
.CENTER
%6⊂⊗⊃L[α%0.00,α%-5.60](17,22):N62F.PLT[C5,LCS]⊂⊗⊃%1
.SKIP 13
.begin verbatim
Example 63
.end
.CENTER
%6⊂⊗⊃L[α%0.00,α%-2.92](17,22):N63X.PLT[C5,LCS]⊂⊗⊃%1
.skip 6
.begin verbatim
Figure 63
.end
.CENTER
%6⊂⊗⊃L[α%0.00,α%-5.20](17,22):N63F.PLT[C5,LCS]⊂⊗⊃%1